|
900
|
How can I prevent a link to end to a specified bar
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->AllowLinkBars = true;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,160);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,20).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Not-End-Linkable"));
var_Items->AddBar(h,TVariant("Unknown"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,6,28).operator double()),TNoParam(),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCanEndLink,TVariant(false));
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
G2antt1->EndUpdate();
|
|
899
|
How can I prevent a link to start from a specified bar
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->AllowLinkBars = true;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,160);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,20).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Not-Start-Linkable"));
var_Items->AddBar(h,TVariant("Unknown"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,6,28).operator double()),TNoParam(),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCanStartLink,TVariant(false));
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
G2antt1->EndUpdate();
|
|
898
|
How can I prevent a specified bar to be linked
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->AllowLinkBars = true;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,160);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,20).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Not-Linkable"));
var_Items->AddBar(h,TVariant("Unknown"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,6,28).operator double()),TNoParam(),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCanBeLinked,TVariant(false));
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
G2antt1->EndUpdate();
|
|
897
|
How can I display in the chart's header only days where the week starts
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,1,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->FirstWeekDay = Exg2anttlib_tlb::WeekDayEnum::exMonday;
Exg2anttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(0);
var_Level->set_Label(TVariant("<%mmmm%> <%yyyy%>"));
var_Level->Alignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
var_Level->Unit = Exg2anttlib_tlb::UnitEnum::exMonth;
Exg2anttlib_tlb::ILevelPtr var_Level1 = var_Chart->get_Level(1);
var_Level1->Unit = Exg2anttlib_tlb::UnitEnum::exDay;
var_Level1->FormatLabel = L" (0:=weekday(dvalue)) = 1 ? '<b>' +value : '' ";
var_Chart->UnitWidth = 23;
|
|
896
|
Is there any automatically way to display and change the bar's duration in the columns section
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Tasks");
Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Duration");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(513));
var_Column->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::SpinType;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AllowCellValueToItemBar = true;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2009,1,2).operator double()),TVariant(TDateTime(2009,1,7).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2009,1,4).operator double()),TVariant(TDateTime(2009,1,9).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
895
|
How can I programatically move or resize a bar using spin or slider controls in the columns
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Tasks");
Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Start");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(1));
var_Column->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::SpinType;
Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"End");
var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(2));
var_Column1->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::SpinType;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->ShowEmptyBars = 1;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AllowCellValueToItemBar = true;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2009,1,2).operator double()),TVariant(TDateTime(2009,1,7).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2009,1,4).operator double()),TVariant(TDateTime(2009,1,9).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
894
|
I am trying to call the ItemBar(exBarStart) after curent ending point, and the bar is not updated. What I am doing wrong
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,64);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,21).operator double()));
var_Chart->ShowEmptyBars = 1;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Test"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2005,6,22).operator double()),TVariant(TDateTime(2005,6,26).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2005,6,27).operator double()),TVariant(var_Items->get_ItemBar(h,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEnd)),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
893
|
How can change in the same time the starting and ending points of the bar
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,64);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,21).operator double()));
var_Chart->ShowEmptyBars = 1;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Test"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2005,6,22).operator double()),TVariant(TDateTime(2005,6,26).operator double()),TNoParam(),TNoParam());
Exg2anttlib_tlb::IItemsPtr var_Items1 = G2antt1->Items;
h = var_Items1->FirstVisibleItem;
var_Items1->AddBar(h,TVariant("Task"),TVariant(TDateTime(2005,6,27).operator double()),TVariant(TDateTime(2005,6,29).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
892
|
How can I control the exBarEffort property of the bar using slider controls
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->ShowFocusRect = false;
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exResizeChart;
G2antt1->Columns->Add(L"Tasks")->AllowDragging = false;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Histogram");
var_Column->AllowDragging = false;
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
var_Column->PartialCheck = true;
var_Column->AllowSizing = false;
var_Column->Width = 18;
var_Column->set_LevelKey(TVariant(1));
G2antt1->Items->AllowCellValueToItemBar = true;
Exg2anttlib_tlb::IColumnPtr var_Column1 = G2antt1->Columns->Add(L"Effort");
var_Column1->set_LevelKey(TVariant(1));
var_Column1->AllowDragging = false;
var_Column1->AllowSizing = false;
var_Column1->Width = 64;
var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(21));
Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column1->Editor;
var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::SliderType;
var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exSliderWidth,TVariant(-100));
var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exSliderMax,TVariant(9));
var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exSliderMin,TVariant(1));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 3;
var_Chart->NonworkingDays = 0;
var_Chart->set_PaneWidth(false,160);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,20).operator double()));
var_Chart->HistogramVisible = true;
var_Chart->HistogramView = Exg2anttlib_tlb::HistogramViewEnum(0x10000 | Exg2anttlib_tlb::HistogramViewEnum::exHistogramNoGrouping | Exg2anttlib_tlb::HistogramViewEnum::exHistogramRecLeafItems | Exg2anttlib_tlb::HistogramViewEnum::exHistogramLeafItems | Exg2anttlib_tlb::HistogramViewEnum::exHistogramUnlockedItems | Exg2anttlib_tlb::HistogramViewEnum::exHistogramCheckedItems);
var_Chart->HistogramHeight = 64;
Exg2anttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->HistogramCriticalColor = RGB(255,0,0);
var_Bar->HistogramPattern = Exg2anttlib_tlb::PatternEnum::exBezierCurve;
var_Bar->HistogramType = Exg2anttlib_tlb::HistogramTypeEnum::exHistOverAllocation;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project 1"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,7,1).operator double()),TNoParam(),TNoParam());
var_Items->set_CellEditorVisible(TVariant(h),TVariant(2),Exg2anttlib_tlb::EditorVisibleEnum::exEditorHidden);
var_Items->set_CellValue(TVariant(h),TVariant(2),TVariant(""));
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,6,28).operator double()),TNoParam(),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,7,1).operator double()),TVariant(""),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->set_ItemBar(h1,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEffort,TVariant(5));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,25).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant(""),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->set_ExpandItem(h,true);
var_Items->set_CellState(TVariant(h),TVariant(1),1);
h = var_Items->AddItem(TVariant("Project 2"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2005,3,7).operator double()),TVariant(TDateTime(2005,7,12).operator double()),TNoParam(),TNoParam());
var_Items->set_CellEditorVisible(TVariant(h),TVariant(2),Exg2anttlib_tlb::EditorVisibleEnum::exEditorHidden);
var_Items->set_CellValue(TVariant(h),TVariant(2),TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,7,3).operator double()),TVariant(TDateTime(2005,7,8).operator double()),TNoParam(),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,7,5).operator double()),TVariant(TDateTime(2005,7,12).operator double()),TVariant(""),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->set_ItemBar(h1,TVariant(""),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEffort,TVariant(5));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,7,7).operator double()),TVariant(TDateTime(2005,7,8).operator double()),TVariant(""),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->set_ExpandItem(h,true);
var_Items->set_CellState(TVariant(h),TVariant(1),1);
G2antt1->EndUpdate();
|
|
891
|
How can I determine if there is any Redo operation
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->AllowUndoRedo = true;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 2")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TNoParam(),TNoParam());
bool var_CanRedo = G2antt1->Chart->CanRedo;
|
|
890
|
How can I determine if there is any Undo operation
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->AllowUndoRedo = true;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 2")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TNoParam(),TNoParam());
bool var_CanUndo = G2antt1->Chart->CanUndo;
|
|
889
|
How can I turn on the Undo/Redo feature
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->AllowUndoRedo = true;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 2")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TNoParam(),TNoParam());
|
|
888
|
How can I disable resizing the histogram at runtime
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exDisableHistogram;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
var_Chart->HistogramVisible = true;
var_Chart->HistogramHeight = 32;
var_Chart->Bars->get_Item(TVariant("Task"))->HistogramPattern = Exg2anttlib_tlb::PatternEnum::exPatternBDiagonal;
G2antt1->Columns->Add(L"Column");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 2")),TVariant("Task"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TNoParam(),TNoParam());
|
|
887
|
How can I display automatically the start and end dates of the bars in the columns section
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Tasks");
Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Start");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(1));
var_Column->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"End");
var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(2));
var_Column1->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->AllowLinkBars = true;
var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exNoCreateBar;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,196);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AllowCellValueToItemBar = true;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2006,9,21).operator double()),TVariant(TDateTime(2006,9,24).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2006,9,22).operator double()),TVariant(TDateTime(2006,9,25).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 3")),TVariant("Task"),TVariant(TDateTime(2006,9,23).operator double()),TVariant(TDateTime(2006,9,26).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
886
|
How can I enable Undo/Redo support
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exHLines;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Tasks");
Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Start");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(1));
var_Column->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
var_Column->set_LevelKey(TVariant(1));
Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"End");
var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(2));
var_Column1->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
var_Column1->set_LevelKey(TVariant(1));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exHLines;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->AllowLinkBars = true;
var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exNoCreateBar;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,196);
var_Chart->AllowUndoRedo = true;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AllowCellValueToItemBar = true;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2006,9,21).operator double()),TVariant(TDateTime(2006,9,24).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2006,9,22).operator double()),TVariant(TDateTime(2006,9,25).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 3")),TVariant("Task"),TVariant(TDateTime(2006,9,23).operator double()),TVariant(TDateTime(2006,9,26).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
885
|
Is there any option to update the bar's properties once the cell's value is changed ( associate the cell with bar )
G2antt1->BeginUpdate();
G2antt1->Debug = true;
G2antt1->MarkSearchColumn = false;
G2antt1->Items->AllowCellValueToItemBar = true;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Tasks");
var_Columns->Add(L"Start")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
var_Columns->Add(L"End")->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
var_Columns->Add(L"Info");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->AllowLinkBars = false;
var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exNoCreateBar;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,224);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h1 = var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2006,9,21).operator double()),TVariant(TDateTime(2006,9,23).operator double()),TVariant("A"),TVariant("Caption"));
var_Items->set_ItemBar(h1,TVariant("A"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarHAlignCaption,TVariant(18));
var_Items->get_CellEditor(TVariant(h1),TVariant(3))->EditType = Exg2anttlib_tlb::EditTypeEnum::EditType;
var_Items->CellValueToItemBar(TVariant(h1),TVariant(1),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarStart,TVariant("A"));
var_Items->CellValueToItemBar(TVariant(h1),TVariant(2),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEnd,TVariant("A"));
var_Items->CellValueToItemBar(TVariant(h1),TVariant(3),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCaption,TVariant("A"));
long h2 = var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2006,9,22).operator double()),TVariant(TDateTime(2006,9,24).operator double()),TVariant("B"),TNoParam());
Exg2anttlib_tlb::IEditorPtr var_Editor = var_Items->get_CellEditor(TVariant(h2),TVariant(3));
var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::SliderType;
var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exSliderWidth,TVariant(-100));
var_Items->CellValueToItemBar(TVariant(h2),TVariant(1),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarStart,TVariant("B"));
var_Items->CellValueToItemBar(TVariant(h2),TVariant(2),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEnd,TVariant("B"));
var_Items->CellValueToItemBar(TVariant(h2),TVariant(3),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarTransparent,TVariant("B"));
long h3 = var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2006,9,23).operator double()),TVariant(TDateTime(2006,9,25).operator double()),TVariant("C"),TNoParam());
Exg2anttlib_tlb::IEditorPtr var_Editor1 = var_Items->get_CellEditor(TVariant(h3),TVariant(3));
var_Editor1->EditType = Exg2anttlib_tlb::EditTypeEnum::DropDownType;
var_Editor1->AddItem(0,L"Task",TNoParam());
var_Editor1->AddItem(1,L"Progress",TNoParam());
var_Editor1->AddItem(2,L"Project Summary",TNoParam());
var_Editor1->AddItem(2,L"Summary",TNoParam());
var_Items->CellValueToItemBar(TVariant(h3),TVariant(1),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarStart,TVariant("C"));
var_Items->CellValueToItemBar(TVariant(h3),TVariant(2),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEnd,TVariant("C"));
var_Items->CellValueToItemBar(TVariant(h3),TVariant(3),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarName,TVariant("C"));
G2antt1->EndUpdate();
|
|
884
|
Is there any option to update the bar's properties once the cell's value is changed ( associate the column/cell with bars )
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->Indent = 11;
G2antt1->HasLines = Exg2anttlib_tlb::HierarchyLineEnum::exSolidLine;
G2antt1->Items->AllowCellValueToItemBar = true;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Tasks");
Exg2anttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Start");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(1));
var_Column->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
var_Column->set_LevelKey(TVariant(1));
Exg2anttlib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"End");
var_Column1->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(2));
var_Column1->Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::DateType;
var_Column1->set_LevelKey(TVariant(1));
Exg2anttlib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"Transparency");
var_Column2->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueToItemBarProperty,TVariant(19));
Exg2anttlib_tlb::IEditorPtr var_Editor = var_Column2->Editor;
var_Editor->EditType = Exg2anttlib_tlb::EditTypeEnum::SliderType;
var_Editor->set_Option(Exg2anttlib_tlb::EditorOptionEnum::exSliderWidth,TVariant(-100));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->AllowLinkBars = false;
var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exNoCreateBar;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,224);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2006,9,21).operator double()),TVariant(TDateTime(2006,10,3).operator double()),TNoParam(),TNoParam());
var_Items->set_CellEditorVisible(TVariant(h),TVariant(1),Exg2anttlib_tlb::EditorVisibleEnum::exEditorHidden);
var_Items->set_CellEditorVisible(TVariant(h),TVariant(2),Exg2anttlib_tlb::EditorVisibleEnum::exEditorHidden);
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2006,9,21).operator double()),TVariant(TDateTime(2006,9,24).operator double()),TNoParam(),TNoParam());
long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2006,9,24).operator double()),TVariant(TDateTime(2006,9,28).operator double()),TNoParam(),TNoParam());
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2006,9,28).operator double()),TVariant(TDateTime(2006,10,3).operator double()),TNoParam(),TNoParam());
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->DefineSummaryBars(h,TVariant(""),h2,TVariant(""));
var_Items->DefineSummaryBars(h,TVariant(""),h3,TVariant(""));
var_Items->set_ExpandItem(h,true);
var_Items->set_ItemBold(h,true);
G2antt1->EndUpdate();
|
|
883
|
How can I group two bars so I can specify the range or the limit of the interval between them
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exResizeChart;
G2antt1->Columns->Add(L"Tasks");
G2antt1->Columns->Add(L"Start")->Visible = false;
G2antt1->Columns->Add(L"End")->Visible = false;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->set_PaneWidth(false,64);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project"));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2006,9,21).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(2),TVariant(TDateTime(2006,10,3).operator double()));
var_Items->AddBar(h,TVariant("Summary"),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))),TVariant("sum"),TNoParam());
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->set_CellValue(TVariant(h1),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))));
var_Items->set_CellValue(TVariant(h1),TVariant(2),TVariant(TDateTime(2006,9,24).operator double()));
var_Items->AddBar(h1,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))),TVariant("K1"),TNoParam());
long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->set_CellValue(TVariant(h2),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))));
var_Items->set_CellValue(TVariant(h2),TVariant(2),TVariant(TDateTime(2006,9,28).operator double()));
var_Items->AddBar(h2,TVariant("Unknown"),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->set_CellValue(TVariant(h3),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))));
var_Items->set_CellValue(TVariant(h3),TVariant(2),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))));
var_Items->AddBar(h3,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(2))),TVariant("K3"),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
var_Items->GroupBars(h1,TVariant("K1"),false,h2,TVariant("K2"),true,TVariant(31),TVariant("0;4"));
var_Items->GroupBars(h2,TVariant("K2"),false,h3,TVariant("K3"),true,TVariant(31),TVariant("0;2"));
var_Items->DefineSummaryBars(h,TVariant("sum"),h1,TVariant("K1"));
var_Items->DefineSummaryBars(h,TVariant("sum"),h2,TVariant("K2"));
var_Items->DefineSummaryBars(h,TVariant("sum"),h3,TVariant("K3"));
var_Items->set_ExpandItem(h,true);
var_Items->set_ItemBold(h,true);
G2antt1->EndUpdate();
|
|
882
|
How can I group my bars so I can resize the interval between them but still keep the lengths of them
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exResizeChart;
G2antt1->Columns->Add(L"Tasks");
G2antt1->Columns->Add(L"Start")->Visible = false;
G2antt1->Columns->Add(L"End")->Visible = false;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->set_PaneWidth(false,64);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project"));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2006,9,21).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(2),TVariant(TDateTime(2006,10,3).operator double()));
var_Items->AddBar(h,TVariant("Summary"),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))),TNoParam(),TNoParam());
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->set_CellValue(TVariant(h1),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))));
var_Items->set_CellValue(TVariant(h1),TVariant(2),TVariant(TDateTime(2006,9,24).operator double()));
var_Items->AddBar(h1,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))),TNoParam(),TNoParam());
long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->set_CellValue(TVariant(h2),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))));
var_Items->set_CellValue(TVariant(h2),TVariant(2),TVariant(TDateTime(2006,9,28).operator double()));
var_Items->AddBar(h2,TVariant("Unknown"),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))),TNoParam(),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant(""),h2,TVariant(""));
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->set_CellValue(TVariant(h3),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))));
var_Items->set_CellValue(TVariant(h3),TVariant(2),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))));
var_Items->AddBar(h3,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(2))),TNoParam(),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant(""),h3,TVariant(""));
var_Items->GroupBars(h1,TVariant(""),false,h2,TVariant(""),true,TVariant(35),TNoParam());
var_Items->GroupBars(h2,TVariant(""),false,h3,TVariant(""),true,TVariant(35),TNoParam());
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->DefineSummaryBars(h,TVariant(""),h2,TVariant(""));
var_Items->DefineSummaryBars(h,TVariant(""),h3,TVariant(""));
var_Items->set_ExpandItem(h,true);
var_Items->set_ItemBold(h,true);
G2antt1->EndUpdate();
|
|
881
|
Can I group my bars so they move together when a bar inside changes, but still preserving the length of the bars
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exResizeChart;
G2antt1->Columns->Add(L"Tasks");
G2antt1->Columns->Add(L"Start")->Visible = false;
G2antt1->Columns->Add(L"End")->Visible = false;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2006,9,20).operator double()));
var_Chart->set_PaneWidth(false,64);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project"));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2006,9,21).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(2),TVariant(TDateTime(2006,10,3).operator double()));
var_Items->AddBar(h,TVariant("Summary"),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))),TNoParam(),TNoParam());
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->set_CellValue(TVariant(h1),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(1))));
var_Items->set_CellValue(TVariant(h1),TVariant(2),TVariant(TDateTime(2006,9,24).operator double()));
var_Items->AddBar(h1,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))),TNoParam(),TNoParam());
long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->set_CellValue(TVariant(h2),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h1),TVariant(2))));
var_Items->set_CellValue(TVariant(h2),TVariant(2),TVariant(TDateTime(2006,9,28).operator double()));
var_Items->AddBar(h2,TVariant("Unknown"),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))),TNoParam(),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant(""),h2,TVariant(""));
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->set_CellValue(TVariant(h3),TVariant(1),TVariant(var_Items->get_CellValue(TVariant(h2),TVariant(2))));
var_Items->set_CellValue(TVariant(h3),TVariant(2),TVariant(var_Items->get_CellValue(TVariant(h),TVariant(2))));
var_Items->AddBar(h3,TVariant("Task"),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(1))),TVariant(var_Items->get_CellValue(TVariant(h3),TVariant(2))),TNoParam(),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant(""),h3,TVariant(""));
var_Items->GroupBars(h1,TVariant(""),false,h2,TVariant(""),true,TVariant(3),TNoParam());
var_Items->GroupBars(h2,TVariant(""),false,h3,TVariant(""),true,TVariant(3),TNoParam());
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
var_Items->DefineSummaryBars(h,TVariant(""),h2,TVariant(""));
var_Items->DefineSummaryBars(h,TVariant(""),h3,TVariant(""));
var_Items->set_ExpandItem(h,true);
var_Items->set_ItemBold(h,true);
G2antt1->EndUpdate();
|
|
880
|
How can I split the time scale, so a section displays days, while other displays weeks, and the other months
G2antt1->BeginUpdate();
G2antt1->HeaderHeight = 24;
G2antt1->Columns->Add(L"Default");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->DrawDateTicker = true;
var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exVLines;
var_Chart->NonworkingDays = 0;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2007,1,1).operator double()));
var_Chart->LevelCount = 3;
Exg2anttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(0);
var_Level->set_Label(TVariant("<%yyyy%>"));
var_Level->Unit = Exg2anttlib_tlb::UnitEnum::exYear;
Exg2anttlib_tlb::ILevelPtr var_Level1 = var_Chart->get_Level(1);
var_Level1->Alignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
var_Level1->set_Label(TVariant("<%hy%>"));
var_Level1->Unit = Exg2anttlib_tlb::UnitEnum::exHalfYear;
var_Level1->set_ReplaceLabel(L"1",L"<b>1/2</b>");
var_Level1->set_ReplaceLabel(L"2",L"<b>2/2</b>");
Exg2anttlib_tlb::ILevelPtr var_Level2 = var_Chart->get_Level(2);
var_Level2->set_Label(TVariant("<%mmm%>"));
var_Level2->Unit = Exg2anttlib_tlb::UnitEnum::exMonth;
var_Chart->UnitWidth = 28;
var_Chart->AllowInsideZoom = true;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat = var_Chart->DefaultInsideZoomFormat;
var_InsideZoomFormat->OwnerLabel = L"<b><%mmmm%></b> (weeks) ";
var_InsideZoomFormat->InsideLabel = L"<font ;6>W: <b><%ww%></b>";
var_InsideZoomFormat->InsideUnit = Exg2anttlib_tlb::UnitEnum::exWeek;
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
Exg2anttlib_tlb::IInsideZoomPtr var_InsideZoom = var_InsideZooms->Add(TVariant(TDateTime(2007,1,1).operator double()));
var_InsideZoom->AllowCustomFormat = true;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat1 = var_InsideZoom->CustomFormat;
var_InsideZoomFormat1->OwnerLabel = L"<b><%mmmm%></b> (weeks) ";
var_InsideZoomFormat1->InsideLabel = L"<font ;6>W: <b><%ww%></b>";
var_InsideZoomFormat1->InsideUnit = Exg2anttlib_tlb::UnitEnum::exWeek;
var_InsideZoomFormat1->BackColorChart = RGB(187,231,240);
Exg2anttlib_tlb::IInsideZoomPtr var_InsideZoom1 = var_InsideZooms->Add(TVariant(TDateTime(2007,3,1).operator double()));
var_InsideZoom1->AllowCustomFormat = true;
var_InsideZoom1->Width = 356;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat2 = var_InsideZoom1->CustomFormat;
var_InsideZoomFormat2->OwnerLabel = L"<b><%mmmm%></b> (days) ";
var_InsideZoomFormat2->InsideLabel = L"<font ;5><%d%></font>";
var_InsideZoomFormat2->InsideUnit = Exg2anttlib_tlb::UnitEnum::exDay;
var_InsideZoomFormat2->BackColorChart = RGB(145,200,240);
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Task 1 "));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2007,1,12).operator double()),TVariant(TDateTime(2007,3,9).operator double()),TNoParam(),TNoParam());
h = var_Items->AddItem(TVariant("Task 2"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2007,1,25).operator double()),TVariant(TDateTime(2007,3,12).operator double()),TNoParam(),TNoParam());
h = var_Items->AddItem(TVariant("Task 3"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2007,2,1).operator double()),TVariant(TDateTime(2007,2,8).operator double()),TVariant("B1"),TNoParam());
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2007,2,8).operator double()),TVariant(TDateTime(2007,2,15).operator double()),TVariant("B2"),TNoParam());
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2007,2,15).operator double()),TVariant(TDateTime(2007,2,22).operator double()),TVariant("B3"),TNoParam());
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2007,2,22).operator double()),TVariant(TDateTime(2007,2,28).operator double()),TVariant("B4"),TNoParam());
G2antt1->EndUpdate();
|
|
879
|
How can I define a bar that shows two colors, one up and one down, without using skin or EBN files
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
G2antt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IBarPtr var_Bar = G2antt1->Chart->Bars->Add(L"A");
var_Bar->Color = RGB(255,0,0);
var_Bar->Shape = Exg2anttlib_tlb::ShapeBarEnum::exShapeSolidUp;
var_Bar->Pattern = Exg2anttlib_tlb::PatternEnum::exPatternSolid;
Exg2anttlib_tlb::IBarPtr var_Bar1 = G2antt1->Chart->Bars->Add(L"B");
var_Bar1->Color = RGB(128,0,0);
var_Bar1->Shape = Exg2anttlib_tlb::ShapeBarEnum::exShapeSolidDown;
var_Bar1->Pattern = Exg2anttlib_tlb::PatternEnum::exPatternSolid;
G2antt1->Chart->Bars->Add(L"A%B")->Shortcut = L"AB";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Task 1"));
var_Items->AddBar(h,TVariant("AB"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,6).operator double()),TVariant("K1"),TNoParam());
var_Items->set_ItemBar(h,TVariant("K1"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarPercent,TVariant(1));
var_Items->set_ItemBar(h,TVariant("K1"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarCanResizePercent,TVariant(false));
G2antt1->EndUpdate();
|
|
878
|
Does your control support RightToLeft property for RTL languages or right to left
G2antt1->BeginUpdate();
G2antt1->ScrollBars = Exg2anttlib_tlb::ScrollBarsEnum::exDisableBoth;
G2antt1->LinesAtRoot = Exg2anttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"P1");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
var_Column->PartialCheck = true;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
G2antt1->RightToLeft = true;
G2antt1->EndUpdate();
|
|
877
|
Is there any way to display the vertical scroll bar on the left side, as I want to align my data to the right
G2antt1->BeginUpdate();
G2antt1->ScrollBars = Exg2anttlib_tlb::ScrollBarsEnum::exDisableBoth;
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"C1");
var_Columns->Add(L"C2");
var_Columns->Add(L"C3");
var_Columns->Add(L"C4");
var_Columns->Add(L"C5");
var_Columns->Add(L"C6");
var_Columns->Add(L"C7");
var_Columns->Add(L"C8");
G2antt1->RightToLeft = true;
G2antt1->EndUpdate();
|
|
876
|
Can I display the cell's check box after the text
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Column");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellDrawPartsOrder,TVariant("caption,check"));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->set_CellHasCheckBox(TVariant(var_Items->AddItem(TVariant("Caption 1"))),TVariant(0),true);
var_Items->set_CellHasCheckBox(TVariant(var_Items->AddItem(TVariant("Caption 2"))),TVariant(0),true);
|
|
875
|
Can I change the order of the parts in the cell, as checkbox after the text, and so on
G2antt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
G2antt1->Columns->Add(L"Column")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellDrawPartsOrder,TVariant("caption,check,icon,icons,picture"));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Text"));
var_Items->set_CellImage(TVariant(h),TVariant(0),1);
var_Items->set_CellHasCheckBox(TVariant(h),TVariant(0),true);
|
|
874
|
Can I have an image displayed after the text. Can I get that effect without using HTML content
G2antt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
G2antt1->Columns->Add(L"Column")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellDrawPartsOrder,TVariant("caption,icon,check,icons,picture"));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Text"));
var_Items->set_CellImage(TVariant(h),TVariant(0),1);
|
|
873
|
My problem is that I want to mark the cells from every second item in the gant with a other backgroundcolor
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,17).operator double()));
var_Chart->LevelCount = 2;
var_Chart->UnitScale = Exg2anttlib_tlb::UnitEnum::exSecond;
var_Chart->get_Level(1)->FormatLabel = L"(0:=sec(dvalue)) mod 2 ? 0=: : '<bgcolor=00FF00>' + 0=:";
|
|
872
|
Is there any option to print the columns section on each page
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Col 1");
G2antt1->Columns->Add(L"Col 2");
G2antt1->MarkSearchColumn = false;
G2antt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Chart->LevelCount = 2;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h1 = var_Items->AddItem(TVariant("Col 1"));
var_Items->set_CellValue(TVariant(h1),TVariant(1),TVariant("Col 2"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->AddItem(TVariant("Col 1"));
var_Items->set_CellValue(TVariant(h2),TVariant(1),TVariant("Col 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,2,5).operator double()),TVariant(TDateTime(2001,2,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exg2anttlib_tlb::LinkPropertyEnum::exLinkStartPos,TVariant(0));
G2antt1->EndUpdate();
/*
Select the Component\Import Component...\Import a Type Library,
to import the following Type Library:
ExPrint 1.0 Control Library
TypeLib: ExPrint.dll
to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
var_Print->set_Options(TVariant("ColumnsOnEveryPage=-2"));
var_Print->PrintExt = (IUnknown*)G2antt1->DefaultDispatch;
var_Print->Preview();
|
|
871
|
How can I add a different non-working area for different items
G2antt1->Columns->Add(L"Non-Work");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->FirstWeekDay = Exg2anttlib_tlb::WeekDayEnum::exMonday;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,24).operator double()));
var_Chart->set_PaneWidth(false,52);
var_Chart->LevelCount = 2;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("January"));
var_Items->set_ItemNonworkingUnits(h,TVariant(false),L"month(value) = 1");
h = var_Items->AddItem(TVariant("February, Saturday, Sunday"));
var_Items->set_ItemNonworkingUnits(h,TVariant(false),L"month(value) = 2 or (weekday(value) = 0 or weekday(value) = 6)");
h = var_Items->AddItem(TVariant("Sunday"));
var_Items->set_ItemNonworkingUnits(h,TVariant(false),L"weekday(value) = 0");
|
|
870
|
How can I define different non-working units for different items
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,78);
var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exCreateBarAuto;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,20).operator double()));
var_Chart->DrawLevelSeparator = Exg2anttlib_tlb::LevelLineEnum::exLevelNoLine;
var_Chart->LevelCount = 3;
var_Chart->get_Level(1)->DrawGridLines = false;
var_Chart->AllowInsideZoom = true;
var_Chart->DrawDateTicker = true;
var_Chart->DateTickerLabel = L"<%mmm%> <%d%><br><b><%hh%>:<%nn%></b>";
var_Chart->MarkSelectDateColor = 0x7ffff8ee;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat = var_Chart->DefaultInsideZoomFormat;
var_InsideZoomFormat->OwnerLabel = L"<%mmm%> <%d%>";
var_InsideZoomFormat->BackColor = RGB(238,248,255);
var_InsideZoomFormat->BackColorChart = var_InsideZoomFormat->BackColor;
var_InsideZoomFormat->InsideCount = 4;
var_InsideZoomFormat->InsideLabel = L"<b><%hh%></b>";
var_Chart->InsideZooms->Add(TVariant(TDateTime(2005,6,22).operator double()));
var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exVLines;
var_Chart->Bars->get_Item(TVariant("Split"))->Color = RGB(255,0,0);
Exg2anttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->Add(L"Task:Split");
var_Bar->Color = RGB(255,0,0);
var_Bar->Pattern = Exg2anttlib_tlb::PatternEnum::exPatternBDiagonal;
var_Bar->Shortcut = L"TaskS";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project 1"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,7,1).operator double()),TNoParam(),TNoParam());
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("TaskS"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,6,28).operator double()),TNoParam(),TNoParam());
var_Items->set_ItemNonworkingUnits(h1,TVariant(false),L"weekday(value)=1 or weekday(value)=2");
var_Items->set_ItemNonworkingUnits(h1,TVariant(true),L"weekday(value)=1 or weekday(value)=2 or (hour(value)<8 or hour(value)>=16 )");
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h1,TVariant("TaskS"),TVariant(TDateTime(2005,6,22,4,00,00,0).operator double()),TVariant(TDateTime(2005,7,1).operator double()),TVariant("E"),TNoParam());
var_Items->set_ItemNonworkingUnits(h1,TVariant(false),L"weekday(value)=0");
var_Items->set_ItemNonworkingUnits(h1,TVariant(true),L"weekday(value)=0 or hour(value)<4 or hour(value)>19");
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ItemBar(h1,TVariant("E"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEffort,TVariant(5));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h1,TVariant("TaskS"),TVariant(TDateTime(2005,6,22,12,00,00,0).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant("E"),TNoParam());
var_Items->set_ItemNonworkingUnits(h1,TVariant(false),L"weekday(value)=1 or weekday(value)=2");
var_Items->set_ItemNonworkingUnits(h1,TVariant(true),L"weekday(value)=1 or weekday(value)=2 or (hour(value)<8 or hour(value)>=16 )");
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Project 2"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2005,6,26).operator double()),TVariant(TDateTime(2005,7,6).operator double()),TNoParam(),TNoParam());
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("TaskS 1"));
var_Items->AddBar(h1,TVariant("TaskS"),TVariant(TDateTime(2005,6,26).operator double()),TVariant(TDateTime(2005,7,2).operator double()),TNoParam(),TNoParam());
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("TaskS 2"));
var_Items->AddBar(h1,TVariant("TaskS"),TVariant(TDateTime(2005,6,28).operator double()),TVariant(TDateTime(2005,7,6).operator double()),TVariant("E"),TNoParam());
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ItemBar(h1,TVariant("E"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEffort,TVariant(5));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("TaskS 3"));
var_Items->AddBar(h1,TVariant("TaskS"),TVariant(TDateTime(2005,6,30).operator double()),TVariant(TDateTime(2005,7,2).operator double()),TVariant("E"),TNoParam());
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ExpandItem(h,true);
G2antt1->EndUpdate();
|
|
869
|
I want to define/highlight for specified dates as being non-working. Is this possible
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Items");
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->NonworkingDaysColor = RGB(255,0,0);
var_Chart->set_PaneWidth(false,48);
ULong c = var_Chart->NonworkingDaysColor;
Exg2anttlib_tlb::PatternEnum p = var_Chart->NonworkingDaysPattern;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->Add(L"NW");
var_Bar->Color = c;
var_Bar->Pattern = p;
var_Bar->Height = -1;
var_Bar->Shape = Exg2anttlib_tlb::ShapeBarEnum::exShapeSolidFrameless;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Item 1"));
var_Items->AddBar(h,TVariant("NW"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,3).operator double()),TVariant("0"),TNoParam());
var_Items->set_ItemBar(h,TVariant("0"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarSelectable,TVariant(false));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K2"),TNoParam());
h = var_Items->AddItem(TVariant("Item 2"));
var_Items->AddBar(h,TVariant("NW"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("0"),TNoParam());
var_Items->set_ItemBar(h,TVariant("0"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarSelectable,TVariant(false));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K2"),TNoParam());
G2antt1->EndUpdate();
|
|
868
|
Do you have any sample how can I programmatically magnify a single date, so can show the hours, while the rest of the chart displays days
G2antt1->BeginUpdate();
G2antt1->MarkSearchColumn = false;
G2antt1->ShowFocusRect = false;
G2antt1->Columns->Add(L"Tasks");
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"C");
var_Column->HeaderAlignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
var_Column->PartialCheck = true;
var_Column->AllowSizing = false;
var_Column->Width = 18;
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,96);
var_Chart->AllowCreateBar = Exg2anttlib_tlb::CreateBarEnum::exCreateBarAuto;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2005,6,20).operator double()));
var_Chart->DrawLevelSeparator = Exg2anttlib_tlb::LevelLineEnum::exLevelNoLine;
var_Chart->LevelCount = 3;
var_Chart->get_Level(1)->DrawGridLines = false;
var_Chart->AllowInsideZoom = true;
var_Chart->DrawDateTicker = true;
var_Chart->DateTickerLabel = L"<%mmm%> <%d%><br><b><%hh%>:<%nn%></b>";
var_Chart->MarkSelectDateColor = 0x7ffff8ee;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat = var_Chart->DefaultInsideZoomFormat;
var_InsideZoomFormat->OwnerLabel = L"<%mmm%> <%d%>";
var_InsideZoomFormat->BackColor = RGB(238,248,255);
var_InsideZoomFormat->BackColorChart = var_InsideZoomFormat->BackColor;
var_InsideZoomFormat->InsideCount = 4;
var_InsideZoomFormat->InsideLabel = L"<b><%hh%></b>";
var_Chart->InsideZooms->Add(TVariant(TDateTime(2005,6,22).operator double()));
var_Chart->DrawGridLines = Exg2anttlib_tlb::GridLinesEnum::exVLines;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Project 1"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,7,1).operator double()),TNoParam(),TNoParam());
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,21).operator double()),TVariant(TDateTime(2005,6,28).operator double()),TNoParam(),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,23).operator double()),TVariant(TDateTime(2005,7,1).operator double()),TVariant("E"),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ItemBar(h1,TVariant("E"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEffort,TVariant(5));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,25).operator double()),TVariant(TDateTime(2005,6,27).operator double()),TVariant("E"),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ExpandItem(h,true);
var_Items->set_CellState(TVariant(h),TVariant(1),1);
h = var_Items->AddItem(TVariant("Project 2"));
var_Items->AddBar(h,TVariant("Summary"),TVariant(TDateTime(2005,6,26).operator double()),TVariant(TDateTime(2005,7,6).operator double()),TNoParam(),TNoParam());
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,26).operator double()),TVariant(TDateTime(2005,7,2).operator double()),TNoParam(),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant(""));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,28).operator double()),TVariant(TDateTime(2005,7,6).operator double()),TVariant("E"),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ItemBar(h1,TVariant("E"),Exg2anttlib_tlb::ItemBarPropertyEnum::exBarEffort,TVariant(5));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2005,6,30).operator double()),TVariant(TDateTime(2005,7,2).operator double()),TVariant("E"),TNoParam());
var_Items->set_CellMerge(TVariant(h1),TVariant(0),TVariant(1));
var_Items->DefineSummaryBars(h,TVariant(""),h1,TVariant("E"));
var_Items->set_ExpandItem(h,true);
var_Items->set_CellState(TVariant(h),TVariant(1),1);
G2antt1->EndUpdate();
|
|
867
|
How can I define my own/custom labels and subdivisions
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->ToolTip = L"";
var_Chart->set_PaneWidth(false,0);
var_Chart->set_ScrollRange(Exg2anttlib_tlb::ScrollRangeEnum::exStartDate,TVariant(0));
var_Chart->set_ScrollRange(Exg2anttlib_tlb::ScrollRangeEnum::exEndDate,TVariant(110));
var_Chart->set_FirstVisibleDate(TVariant(0));
var_Chart->ShowNonworkingDates = false;
var_Chart->MarkTodayColor = var_Chart->BackColor;
var_Chart->LevelCount = 3;
Exg2anttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(0);
var_Level->set_ToolTip(TVariant(""));
var_Level->Alignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
var_Level->Unit = Exg2anttlib_tlb::UnitEnum::exDay;
var_Level->Count = 16;
var_Level->FormatLabel = L"'Group <b>'+int(1 +dvalue/16)";
Exg2anttlib_tlb::ILevelPtr var_Level1 = var_Chart->get_Level(1);
var_Level1->set_ToolTip(TVariant(""));
var_Level1->Alignment = Exg2anttlib_tlb::AlignmentEnum::CenterAlignment;
var_Level1->Unit = Exg2anttlib_tlb::UnitEnum::exDay;
var_Level1->Count = 4;
var_Level1->FormatLabel = L" (abs(dvalue)/4) mod 4";
var_Level1->set_ReplaceLabel(L"0",L"Sub-Group <b>1</b>");
var_Level1->set_ReplaceLabel(L"1",L"Sub-Group <b>2</b>");
var_Level1->set_ReplaceLabel(L"2",L"Sub-Group <b>3</b>");
var_Level1->set_ReplaceLabel(L"3",L"Sub-Group <b>4</b>");
Exg2anttlib_tlb::ILevelPtr var_Level2 = var_Chart->get_Level(2);
var_Level2->set_ToolTip(TVariant(""));
var_Level2->Unit = Exg2anttlib_tlb::UnitEnum::exDay;
var_Level2->Count = 1;
var_Level2->FormatLabel = L"(abs(dvalue) mod 4)";
var_Level2->set_ReplaceLabel(L"0",L"A");
var_Level2->set_ReplaceLabel(L"1",L"B");
var_Level2->set_ReplaceLabel(L"2",L"C");
var_Level2->set_ReplaceLabel(L"3",L"D");
G2antt1->EndUpdate();
|
|
866
|
I want to mark or highlight the last Friday of the month. Is there any option to do that
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,17).operator double()));
var_Chart->LevelCount = 2;
var_Chart->get_Level(1)->FormatLabel = L"(weekday(dvalue)=5 ? month(dvalue+7)!=month(dvalue) ? '<b><bgcolor=000000><fgcolor=FFFFFF>' ) + value";
|
|
865
|
I use the SelectDate method but the dates are not being highligted. What can I do
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->MarkTodayColor = var_Chart->BackColor;
var_Chart->LevelCount = 2;
var_Chart->SelectLevel = 1;
var_Chart->set_SelectDate(TDateTime(2008,1,2).operator double(),true);
G2antt1->EndUpdate();
|
|
864
|
Can I use ebn files to display the selected dates
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IAppearancePtr var_Appearance = G2antt1->VisualAppearance;
var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\normal.ebn"));
var_Appearance->Add(1,TVariant("CP:2 0 -4 0 4"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->MarkTodayColor = var_Chart->BackColor;
var_Chart->LevelCount = 2;
var_Chart->MarkSelectDateColor = 0x1000000;
var_Chart->SelectLevel = 1;
var_Chart->set_SelectDate(TDateTime(2008,1,3).operator double(),true);
var_Chart->set_SelectDate(TDateTime(2008,1,4).operator double(),true);
G2antt1->Columns->Add(L"Default");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2008,1,2).operator double()),TVariant(TDateTime(2008,1,6).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 2")),TVariant("Task"),TVariant(TDateTime(2008,1,3).operator double()),TVariant(TDateTime(2008,1,7).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 3")),TVariant("Task"),TVariant(TDateTime(2008,1,4).operator double()),TVariant(TDateTime(2008,1,8).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 4")),TVariant("Task"),TVariant(TDateTime(2008,1,5).operator double()),TVariant(TDateTime(2008,1,9).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
863
|
Can I use ebn files to display the selected dates
G2antt1->BeginUpdate();
G2antt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->MarkTodayColor = var_Chart->BackColor;
var_Chart->LevelCount = 2;
var_Chart->MarkSelectDateColor = 0x1000000;
var_Chart->SelectLevel = 1;
var_Chart->set_SelectDate(TDateTime(2008,1,3).operator double(),true);
G2antt1->Columns->Add(L"Default");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Task"),TVariant(TDateTime(2008,1,2).operator double()),TVariant(TDateTime(2008,1,6).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 2")),TVariant("Task"),TVariant(TDateTime(2008,1,3).operator double()),TVariant(TDateTime(2008,1,7).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Item 3")),TVariant("Task"),TVariant(TDateTime(2008,1,4).operator double()),TVariant(TDateTime(2008,1,8).operator double()),TNoParam(),TNoParam());
G2antt1->EndUpdate();
|
|
862
|
How can I change the color for selected dates to be solid
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->MarkTodayColor = var_Chart->BackColor;
var_Chart->LevelCount = 2;
var_Chart->MarkSelectDateColor = 0x7fff0000;
var_Chart->SelectLevel = 1;
var_Chart->set_SelectDate(TDateTime(2008,1,15).operator double(),true);
var_Chart->set_SelectDate(TDateTime(2008,1,16).operator double(),true);
G2antt1->EndUpdate();
|
|
861
|
How can I disable selecting dates when I click the chart's header
G2antt1->Chart->AllowSelectDate = Exg2anttlib_tlb::SelectDateEnum::exNoSelectDate;
|
|
860
|
Is there any option to specify which dates can be magnified or resized
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->ShowNonworkingDates = true;
var_Chart->CondInsideZoom = L"not(weekday(value) = 0 or weekday(value) = 6)";
G2antt1->EndUpdate();
|
|
859
|
How can I change the width for a specified date time unit
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
Exg2anttlib_tlb::IInsideZoomPtr var_InsideZoom = var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()));
var_InsideZoom->Width = 32;
var_InsideZoom->AllowInsideFormat = false;
G2antt1->EndUpdate();
|
|
858
|
How can I disable the control's splitter so the user can't resize the list area
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exDisableSplitter | Exg2anttlib_tlb::OnResizeControlEnum::exResizeChart;
G2antt1->Chart->set_PaneWidth(false,60);
|
|
857
|
How can I disable the control's splitter so the user can't resize the chart area
G2antt1->OnResizeControl = Exg2anttlib_tlb::OnResizeControlEnum::exDisableSplitter;
G2antt1->Chart->set_PaneWidth(true,60);
|
|
856
|
How can I change the label for a specified unit
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
var_Chart->DefaultInsideZoomFormat->OwnerLabel = L"<b><%d%></b> <%d2%>";
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
var_InsideZooms->DefaultWidth = 32;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()))->AllowInsideFormat = false;
G2antt1->EndUpdate();
|
|
855
|
How can I bold the inside units
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
var_Chart->DefaultInsideZoomFormat->InsideLabel = L"<b><%hh%></b>";
var_Chart->InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()));
G2antt1->EndUpdate();
|
|
854
|
How can I change the scale unit when doing inside zoom ( the chart displays weeks, and we want week days )
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->ShowNonworkingDates = false;
var_Chart->set_PaneWidth(false,0);
var_Chart->LevelCount = 2;
Exg2anttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(0);
var_Level->set_Label(TVariant("<%mmmm%>"));
var_Level->Unit = Exg2anttlib_tlb::UnitEnum::exMonth;
Exg2anttlib_tlb::ILevelPtr var_Level1 = var_Chart->get_Level(1);
var_Level1->set_Label(TVariant("<%ww%>"));
var_Level1->Unit = Exg2anttlib_tlb::UnitEnum::exWeek;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat = var_Chart->DefaultInsideZoomFormat;
var_InsideZoomFormat->OwnerLabel = L"<font ;7><%mmm%> Week: <%ww%>";
var_InsideZoomFormat->InsideLabel = L"<font ;7><b><%d1%></b>";
var_InsideZoomFormat->InsideUnit = Exg2anttlib_tlb::UnitEnum::exDay;
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
var_InsideZooms->Add(TVariant(TDateTime(2008,2,3).operator double()));
G2antt1->EndUpdate();
|
|
853
|
How can I zoom or magnify the selected date to display the hours, from 8 to 8
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
Exg2anttlib_tlb::IInsideZoomFormatPtr var_InsideZoomFormat = var_Chart->DefaultInsideZoomFormat;
var_InsideZoomFormat->InsideLabel = L"H: <b><%hh%></b>";
var_InsideZoomFormat->InsideUnit = Exg2anttlib_tlb::UnitEnum::exHour;
var_InsideZoomFormat->InsideCount = 8;
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()));
G2antt1->EndUpdate();
|
|
852
|
How can I zoom or magnify the selected date to display the hours
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()));
G2antt1->EndUpdate();
|
|
851
|
How can I change the foreground color for a time unit
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
var_Chart->DefaultInsideZoomFormat->ForeColor = RGB(255,0,0);
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
var_InsideZooms->DefaultWidth = 18;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()))->AllowInsideFormat = false;
G2antt1->EndUpdate();
|
|
850
|
How can I change the background color for a time unit, in the chart area
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
var_Chart->DefaultInsideZoomFormat->BackColorChart = RGB(255,0,0);
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
var_InsideZooms->DefaultWidth = 18;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()))->AllowInsideFormat = false;
G2antt1->EndUpdate();
|
|
849
|
How can I change the background color for a time unit, using EBN files
G2antt1->BeginUpdate();
G2antt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
var_Chart->DefaultInsideZoomFormat->BackColor = 0x1000000;
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
var_InsideZooms->DefaultWidth = 18;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()))->AllowInsideFormat = false;
G2antt1->EndUpdate();
|
|
848
|
How can I change the background color for a time unit
G2antt1->BeginUpdate();
Exg2anttlib_tlb::IChartPtr var_Chart = G2antt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2008,1,1).operator double()));
var_Chart->AllowInsideZoom = true;
var_Chart->AllowResizeInsideZoom = false;
var_Chart->InsideZoomOnDblClick = false;
var_Chart->DefaultInsideZoomFormat->BackColor = RGB(255,0,0);
Exg2anttlib_tlb::IInsideZoomsPtr var_InsideZooms = var_Chart->InsideZooms;
var_InsideZooms->SplitBaseLevel = false;
var_InsideZooms->DefaultWidth = 18;
var_InsideZooms->Add(TVariant(TDateTime(2008,1,4).operator double()))->AllowInsideFormat = false;
G2antt1->EndUpdate();
|
|
847
|
How can I display the column using currency format and enlarge the font for certain values
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Currency");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
var_Column->FormatColumn = L"len(value) ? ((0:=dbl(value)) < 10 ? '<fgcolor=808080><font ;7>' : '<b>') + currency(=:0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
var_Items->AddItem(TVariant("9.94"));
var_Items->AddItem(TVariant("11.94"));
var_Items->AddItem(TVariant("1000"));
|
|
846
|
How can I highlight only parts of the cells
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
var_Column->FormatColumn = L"value replace 'hil' with '<fgcolor=FF0000><b>hil</b></fgcolor>'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
845
|
How can I get the number of occurrences of a specified string in the cell
G2antt1->Columns->Add(L"");
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"occurrences");
var_Column->ComputedField = L"lower(%0) count 'o'";
var_Column->FormatColumn = L"'contains ' + value + ' of \\'o\\' chars'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1 oooof the root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
844
|
How can I display dates in my format
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Date");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
var_Column->FormatColumn = L"'<b>' + year(0:=date(value)) + '</b><fgcolor=808080><font ;6> (' + month(=:0) + ' - ' + day(=:0) +')'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,21).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,24).operator double()));
|
|
843
|
How can I display dates in short format
G2antt1->Columns->Add(L"Date")->FormatColumn = L"shortdate(value)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4).operator double()));
|
|
842
|
How can I display dates in long format
G2antt1->Columns->Add(L"Date")->FormatColumn = L"longdate(value)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4).operator double()));
|
|
841
|
How can I display only the right part of the cell
G2antt1->Columns->Add(L"");
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Right");
var_Column->ComputedField = L"%0 right 2";
var_Column->FormatColumn = L"'\"' + value + '\"'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("SChild 3"));
var_Items->set_ExpandItem(h,true);
|
|
840
|
How can I display only the left part of the cell
G2antt1->Columns->Add(L"");
G2antt1->Columns->Add(L"Left")->ComputedField = L"%0 left 2";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("SChild 3"));
var_Items->set_ExpandItem(h,true);
|
|
839
|
How can I display true or false instead 0 and -1
G2antt1->Columns->Add(L"Boolean")->FormatColumn = L"value != 0 ? 'true' : 'false'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(true));
var_Items->AddItem(TVariant(false));
var_Items->AddItem(TVariant(true));
var_Items->AddItem(TVariant(0));
var_Items->AddItem(TVariant(1));
|
|
838
|
Is there any option to print the columns section on each page
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
G2antt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
G2antt1->Chart->LevelCount = 2;
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h1 = var_Items->AddItem(TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->AddItem(TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,2,5).operator double()),TVariant(TDateTime(2001,2,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exg2anttlib_tlb::LinkPropertyEnum::exLinkStartPos,TVariant(0));
G2antt1->EndUpdate();
/*
Select the Component\Import Component...\Import a Type Library,
to import the following Type Library:
ExPrint 1.0 Control Library
TypeLib: ExPrint.dll
to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
var_Print->set_Options(TVariant("ColumnsOnEveryPage=1"));
var_Print->PrintExt = (IUnknown*)G2antt1->DefaultDispatch;
var_Print->Preview();
|
|
837
|
How do I print the control's content
G2antt1->BeginUpdate();
G2antt1->Columns->Add(L"Task");
G2antt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h1 = var_Items->AddItem(TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->AddItem(TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exg2anttlib_tlb::LinkPropertyEnum::exLinkStartPos,TVariant(0));
G2antt1->EndUpdate();
/*
Select the Component\Import Component...\Import a Type Library,
to import the following Type Library:
ExPrint 1.0 Control Library
TypeLib: ExPrint.dll
to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
var_Print->PrintExt = (IUnknown*)G2antt1->DefaultDispatch;
var_Print->Preview();
|
|
836
|
How can I display icons or images instead numbers
G2antt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Exg2anttlib_tlb::IColumnPtr var_Column = G2antt1->Columns->Add(L"Icons");
var_Column->set_Def(Exg2anttlib_tlb::DefColumnEnum::exCellValueFormat,TVariant(1));
var_Column->FormatColumn = L"'The cell displays the icon <img>'+value+'</img> instead ' + value";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(1));
var_Items->AddItem(TVariant(2));
var_Items->AddItem(TVariant(3));
|
|
835
|
How can I display the column using currency
G2antt1->Columns->Add(L"Currency")->FormatColumn = L"currency(dbl(value))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
var_Items->AddItem(TVariant("0"));
var_Items->AddItem(TVariant(5));
var_Items->AddItem(TVariant("10000.99"));
|
|
834
|
How can I display the currency only for not empty cells
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Currency")->ComputedField = L"len(%0) ? currency(dbl(%0)) : ''";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
var_Items->AddItem(TVariant("0"));
var_Items->set_ItemBackColor(var_Items->AddItem(TNoParam()),RGB(255,128,128));
var_Items->AddItem(TVariant("10000.99"));
|
|
833
|
Is there a function to display the number of days between two date including the number of hours
G2antt1->Columns->Add(L"Start")->Width = 32;
G2antt1->Columns->Add(L"End");
G2antt1->Columns->Add(L"Duration")->ComputedField = TVariant(String("((1:=int(0:= (date(%1)-date(%0)))) != 0 ? (=:1 + ' day(s)') : '') + (=:1 ? ' ' : '' ) + ((1:=int(0:=((=:0 - =:1 + 1/24/60/60/2)") +
"*24))) != 0 ? =:1 + ' hour(s) ' : '' ) + ((1:=round((=:0 - =:1)*60)) != 0 ? =:1 + ' min(s)' : '')");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant(TDateTime(2001,1,11).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2001,1,14).operator double()));
h = var_Items->AddItem(TVariant(TDateTime(2002,2,22,12,00,00,0).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2002,3,14,13,00,00,0).operator double()));
h = var_Items->AddItem(TVariant(TDateTime(2003,3,13).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2003,4,11,11,00,00,0).operator double()));
|
|
832
|
Is there a function to display the number of days between two date including the number of hours
G2antt1->Columns->Add(L"Start");
G2antt1->Columns->Add(L"End");
G2antt1->Columns->Add(L"Duration")->ComputedField = L"\"D \" + int(date(%1)-date(%0)) + \" H \" + round(24*(date(%1)-date(%0) - floor(date(%1)-date(%0))))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant(TDateTime(2001,1,11).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2001,1,14,23,00,00,0).operator double()));
h = var_Items->AddItem(TVariant(TDateTime(2002,2,22,12,00,00,0).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2002,3,14,13,00,00,0).operator double()));
h = var_Items->AddItem(TVariant(TDateTime(2003,3,13).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2003,4,11,11,00,00,0).operator double()));
|
|
831
|
How can I display the number of days between two dates
G2antt1->Columns->Add(L"Start");
G2antt1->Columns->Add(L"End");
G2antt1->Columns->Add(L"Duration")->ComputedField = L"(date(%1)-date(%0)) + ' days'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant(TDateTime(2001,1,11).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2001,1,14).operator double()));
h = var_Items->AddItem(TVariant(TDateTime(2002,2,22).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2002,3,14).operator double()));
h = var_Items->AddItem(TVariant(TDateTime(2003,3,13).operator double()));
var_Items->set_CellValue(TVariant(h),TVariant(1),TVariant(TDateTime(2003,4,11).operator double()));
|
|
830
|
How can I get second part of the date
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Second")->ComputedField = L"sec(date(%0))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,11,10,10,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22,11,01,22,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13,12,23,01,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,14,13,11,59,0).operator double()));
|
|
829
|
How can I get minute part of the date
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Minute")->ComputedField = L"min(date(%0))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,11,10,10,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22,11,01,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13,12,23,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,14,13,11,00,0).operator double()));
|
|
828
|
How can I check the hour part only so I know it was afternoon
G2antt1->ConditionalFormats->Add(L"hour(%0)>=12",TNoParam())->Bold = true;
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Hour")->ComputedField = L"hour(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,11,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,14,13,00,00,0).operator double()));
|
|
827
|
What about a function to get the day in the week, or days since Sunday
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"WeekDay")->ComputedField = L"weekday(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,11,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,14,13,00,00,0).operator double()));
|
|
826
|
Is there any function to get the day of the year or number of days since January 1st
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Day since January 1st")->ComputedField = L"yearday(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,11,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,14,13,00,00,0).operator double()));
|
|
825
|
How can I display only the day of the date
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Day")->ComputedField = L"day(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,11,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,22,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,13,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,14,13,00,00,0).operator double()));
|
|
824
|
How can I display only the month of the date
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Month")->ComputedField = L"month(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4,13,00,00,0).operator double()));
|
|
823
|
How can I get only the year part from a date expression
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Year")->ComputedField = L"year(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4,13,00,00,0).operator double()));
|
|
822
|
Can I convert the expression to date
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Date")->ComputedField = L"date(dbl(%0))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("30000.99"));
var_Items->AddItem(TVariant("3561.23"));
var_Items->AddItem(TVariant("1232.34"));
|
|
821
|
Can I convert the expression to a number, double or float
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Number + 2")->ComputedField = L"dbl(%0)+2";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("0.99"));
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
|
|
820
|
How can I display dates in long format
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"LongFormat")->ComputedField = L"longdate(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4,13,00,00,0).operator double()));
|
|
819
|
How can I display dates in short format
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"ShortFormat")->ComputedField = L"shortdate(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4,13,00,00,0).operator double()));
|
|
818
|
How can I display the time only of a date expression
G2antt1->Columns->Add(L"Date");
G2antt1->Columns->Add(L"Time")->ComputedField = L"'time is:' + time(date(%0))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(TDateTime(2001,1,1,10,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2002,2,2,11,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2003,3,3,12,00,00,0).operator double()));
var_Items->AddItem(TVariant(TDateTime(2004,4,4,13,00,00,0).operator double()));
|
|
817
|
Is there any function to display currencies, or money formatted as in the control panel
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Currency")->ComputedField = L"currency(dbl(%0))";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant(1.23));
var_Items->AddItem(TVariant(2.34));
var_Items->AddItem(TVariant(10000.99));
|
|
816
|
How can I convert the expression to a string so I can look into the date string expression for month's name
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Str")->ComputedField = L"str(%0) + ' AA'";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("0.99"));
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
|
|
815
|
Can I display the absolute value or positive part of the number
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Abs")->ComputedField = L"abs(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("0.99"));
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
|
|
814
|
Is there any function to get largest number with no fraction part that is not greater than the value
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Floor")->ComputedField = L"floor(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("0.99"));
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
|
|
813
|
Is there any function to round the values base on the .5 value
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Round")->ComputedField = L"round(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("0.99"));
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
|
|
812
|
How can I get or display the integer part of the cell
G2antt1->Columns->Add(L"Number");
G2antt1->Columns->Add(L"Int")->ComputedField = L"int(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
var_Items->AddItem(TVariant("-1.98"));
var_Items->AddItem(TVariant("0.99"));
var_Items->AddItem(TVariant("1.23"));
var_Items->AddItem(TVariant("2.34"));
|
|
811
|
How can I display names as proper ( first leter of the word must be in uppercase, and the rest in lowercase )
G2antt1->Columns->Add(L"")->FormatColumn = L"proper(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("root"));
var_Items->InsertItem(h,TNoParam(),TVariant("child child"));
var_Items->InsertItem(h,TNoParam(),TVariant("child child"));
var_Items->InsertItem(h,TNoParam(),TVariant("child child"));
var_Items->set_ExpandItem(h,true);
|
|
810
|
Is there any option to display cells in uppercase
G2antt1->Columns->Add(L"")->FormatColumn = L"upper(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Chld 3"));
var_Items->set_ExpandItem(h,true);
|
|
809
|
Is there any option to display cells in lowercase
G2antt1->Columns->Add(L"")->FormatColumn = L"lower(%0)";
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Chld 3"));
var_Items->set_ExpandItem(h,true);
|
|
808
|
How can I mark the cells that has a specified type, ie strings only
G2antt1->ConditionalFormats->Add(L"type(%0) = 8",TNoParam())->ForeColor = RGB(255,0,0);
G2antt1->Columns->Add(L"");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant(2));
var_Items->InsertItem(h,TNoParam(),TVariant("Chld 3"));
var_Items->set_ExpandItem(h,true);
|
|
807
|
How can I bold the items that contains data or those who displays empty strings
G2antt1->ConditionalFormats->Add(L"not len(%1)=0",TNoParam())->Bold = true;
G2antt1->Columns->Add(L"C1");
G2antt1->Columns->Add(L"C2");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
long hC = var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_CellValue(TVariant(hC),TVariant(1),TVariant("1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
806
|
Can I change the background color for items or cells that contains a specified string
G2antt1->ConditionalFormats->Add(L"%0 contains 'hi'",TNoParam())->BackColor = RGB(255,0,0);
G2antt1->Columns->Add(L"");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Chld 3"));
var_Items->set_ExpandItem(h,true);
|
|
805
|
Is there any option to change the fore color for cells or items that ends with a specified string
G2antt1->ConditionalFormats->Add(L"%0 endwith '22'",TNoParam())->ForeColor = RGB(255,0,0);
G2antt1->Columns->Add(L"");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1.22"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2.22"));
var_Items->set_ExpandItem(h,true);
|
|
804
|
How can I highlight the cells or items that starts with a specified string
G2antt1->ConditionalFormats->Add(L"%0 startwith 'C'",TNoParam())->Underline = true;
G2antt1->Columns->Add(L"");
Exg2anttlib_tlb::IItemsPtr var_Items = G2antt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("SChild 3"));
var_Items->set_ExpandItem(h,true);
|
|
803
|
How can I change the background color or the visual appearance using ebn for a particular column
G2antt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Column 1");
var_Columns->Add(L"Column 2")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exHeaderBackColor,TVariant(16777216));
var_Columns->Add(L"Column 3")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exHeaderBackColor,TVariant(16777471));
var_Columns->Add(L"Column 4");
|
|
802
|
How can I change the foreground color for a particular column
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Column 1");
var_Columns->Add(L"Column 2")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exHeaderForeColor,TVariant(8439039));
var_Columns->Add(L"Column 3");
|
|
801
|
How can I change the background color for a particular column
Exg2anttlib_tlb::IColumnsPtr var_Columns = G2antt1->Columns;
var_Columns->Add(L"Column 1");
var_Columns->Add(L"Column 2")->set_Def(Exg2anttlib_tlb::DefColumnEnum::exHeaderBackColor,TVariant(8439039));
var_Columns->Add(L"Column 3");
|